{FILE being written by POINTY on 18:22  4 Sept 1979}
SCALAR  W;
W ← 3.000;

DEFINE Q = ⊂PRINT("HAH");⊃;


PROCEDURE XX; BEGIN
PRINT("HI");
END


PROCEDURE YY;
BEGIN
PRINT("YY"); { THIS IS A COMMENT }


END